home *** CD-ROM | disk | FTP | other *** search
/ Aminet 24 / Aminet 24 (1998)(GTI - Schatztruhe)[!][Apr 1998].iso / Aminet / biz / patch / TCalc502.lha / Update / UpdateTurboCalc < prev   
Text File  |  1998-01-26  |  15KB  |  430 lines
  1.  
  2. ; ---------------------------------------------------------------------
  3. ;
  4. ; $VER: Update Installer Script 2.02 (20.01.98)
  5. ;
  6. ; Script to update TurboCalc (German, English, Italian, French version)
  7. ;
  8. ; © 1996-98 by Michael Friedrich
  9. ;
  10. ; ---------------------------------------------------------------------
  11. (set APPNAME "TurboCalc")
  12. (set OLDVERSION "5.00")
  13. (set NEWVERSION "5.02")
  14.  
  15. (if (<> @app-name "Test App")
  16.     (set APPNAME @app-name)
  17.     (set @app-name APPNAME)
  18. )
  19.  
  20. (set #DiskVersion 0)
  21. (set #updateprg "TurboCalcCD:Tools/Update")
  22. (set #updateprg_disk "TurboCalc5_Disk1:Tools/Update")
  23.  
  24. (if (<> @language "english")
  25.  ((if ( AND (<> @language "deutsch")
  26.             (AND (<> @language "français") (<> @language "italiano"))
  27.       )
  28.     (set @language "english")
  29.   )
  30.  )
  31. )
  32.  
  33.  
  34. ; ---------------------------------------------------------------------
  35. ;
  36. ;   STRINGS (German)
  37. ;
  38. ; ---------------------------------------------------------------------
  39. (if (= @language "deutsch")
  40.  (
  41.   (set #SourceDir "TurboCalcCD:Deutsch/TurboCalc")
  42.   (set #SourceDir_Disk "TurboCalc5_Disk1:TurboCalc")
  43.   (set #UpdateDir "Deutsch")
  44.   (set #HelpDir "Hilfe")
  45.   (set #HelpDirOS2 "Hilfe_OS2")
  46.  
  47.   (set #welcome
  48.    (cat "Dieses Skript aktualisiert das Programm " APPNAME
  49.         " von der Version " OLDVERSION " auf die Version " NEWVERSION ".\n\n"
  50.   ))
  51.   (set #hello
  52.    (cat "Dieses Skript aktualisiert das Programm " APPNAME
  53.         " von der Version " OLDVERSION " auf die Version " NEWVERSION ".\n\n"
  54.         "Es wird dabei die installierte Version auf der Festplatte geändert; "
  55.         "die Originaldateien werden von CD/Diskette gelesen, "
  56.         "um sicherzustellen, daß es sich um Dateien der Version " OLDVERSION " handelt." )
  57.   )
  58.  
  59.   (set #AskDestFile
  60.    (cat "Bitte bestimmen Sie den Pfad (und ggf. den Dateinamen) Ihrer alten "
  61.         APPNAME "-Version.\n" )
  62.   )
  63.  
  64.   (set #AskDestFileHelp
  65.    (cat "Wechseln Sie in das Verzeichnis, in dem Sie " APPNAME " installiert haben.\n"
  66.         "Der Dateiname muß normalerweise nicht verändert werden.\n" )
  67.   )
  68.  
  69.   (set #updating (cat "Aktualisiere %s ...\n\n"
  70.         "Dies kann einige Zeit dauern,\n"
  71.         "haben Sie bitte etwas Geduld.\n" ))
  72.  
  73.   (set #ErrorUpdateMissing (cat "Das Programm zum Aktualisieren der "
  74.         "Dateien (%s) ist leider nicht vorhanden. Legen Sie bitte die "
  75.         "Original TurboCalc5-CD (TurboCalcCD:) oder Diskette 1 "
  76.          "(TurboCalc5_Disk1:) ein und klicken Sie auf 'Weiter'!" ))
  77.  
  78.   (set #ErrorPrgFileMissing (cat "Der Pfad, in dem " APPNAME " aktualisiert "
  79.         "werden soll, scheint nicht korrekt zu sein (%s). "
  80.         "Das Hauptprogramm '%s' konnte an dieser Stelle nicht gefunden werden. "
  81.         "Bitte suchen Sie im folgenden Dateirequester " APPNAME " und "
  82.         "wählen Sie diese Datei aus." ))
  83.  
  84.   (set #ErrorMsg (cat "Beim Aktualisieren trat folgender Fehler auf:\n%s\n"
  85.             "Die Datei wurde nicht modifiziert!\n "))
  86.  
  87.   (set #Err1 "Kann Alte-Datei nicht öffnen." )
  88.   (set #Err2 "Kann Dif-Datei nicht öffnen." )
  89.   (set #Err3 "Kann Neue-Datei nicht öffnen." )
  90.   (set #Err4 "Falsche Alte-Datei (falsche Länge), UPDATE nicht möglich!" )
  91.   (set #Err5 "Falsche Alte-Datei (CRC falsch), UPDATE nicht möglich!" )
  92.   (set #Err6 "Falsche Alte-Datei (VER falsch), UPDATE nicht möglich!" )
  93.   (set #Err7 "Falsche Dif-Datei-Version, UPDATE mit dieser Version nicht möglich!" )
  94.   (set #Err8 "Nicht genügend Speicher!" )
  95.   (set #Err9 "Unbekannter Fehler: 9" )
  96.   (set #Err10 "Konnte das Programm UPDATE nicht finden!\n")
  97.   (set #ErrUnkown "Unbekannter Fehler: %s" )
  98.  
  99.  )
  100. )
  101. ; ---------------------------------------------------------------------
  102. ;
  103. ;   STRINGS (English)
  104. ;
  105. ; ---------------------------------------------------------------------
  106. (if (= @language "english")
  107.  (
  108.   (set #SourceDir "TurboCalcCD:English/TurboCalc")
  109.   (set #SourceDir_Disk "TurboCalc5_Disk1:TurboCalc")
  110.   (set #UpdateDir "English")
  111.   (set #HelpDir "Help")
  112.   (set #HelpDirOS2 "Help_OS2")
  113.  
  114.   (set #welcome
  115.    (cat "This scripts updates the program " APPNAME
  116.         " from version " OLDVERSION " to the new version " NEWVERSION ".\n\n"
  117.   ))
  118.   (set #hello
  119.    (cat "This scripts updates the program " APPNAME
  120.         " from version " OLDVERSION " to the new version " NEWVERSION ".\n\n"
  121.         "It modifies the installed version on your hard disk; "
  122.         "the old files are read from the original CD/Diskette to assure "
  123.         "that these files are really from version " OLDVERSION "." )
  124.   )
  125.  
  126.   (set #AskDestFile
  127.    (cat "Please select the path (including " APPNAME "'s name) where you have "
  128.         "installed your old " APPNAME " version.\n" )
  129.   )
  130.  
  131.   (set #AskDestFileHelp
  132.    (cat "Change to the drawer where you have installed " APPNAME ".\n"
  133.         "The filename is normally correct and thus needn't changed.\n" )
  134.   )
  135.  
  136.   (set #updating (cat "Updating %s ...\n\n"
  137.         "Please be patient.\n" ))
  138.  
  139.   (set #ErrorUpdateMissing (cat "The program that updates the "
  140.         "files (%s) is not available. Please insert the "
  141.         "original TurboCalc5 CDROM (TurboCalcCD:) or diskette #1 "
  142.         "(TurboCalc5_Disk1:) and try again!" ))
  143.  
  144.   (set #ErrorPrgFileMissing (cat APPNAME "'s path is not correct (%s). "
  145.         "The program '%s' couldn't be found there. "
  146.         "Please choose the correct path/file for " APPNAME " in the "
  147.         "following filerequester." ))
  148.  
  149.   (set #ErrorMsg (cat "An error occured during updating:\n%s\n"
  150.             "The file wasn't modified.\n"))
  151.  
  152.   (set #Err1 "Couldn't open  Old-File." )
  153.   (set #Err2 "Couldn't open Dif-File." )
  154.   (set #Err3 "Coudln't open New-File." )
  155.   (set #Err4 "Wrong Old-File (wrong size), UPDATE impossible!" )
  156.   (set #Err5 "Wrong Old-File (CRC incorrect), UPDATE impossible!" )
  157.   (set #Err6 "Wrong Old-File (wrong VER), UPDATE impossible!" )
  158.   (set #Err7 "Wrong Dif-File-Version, UPDATE with this version of UPDATE not possible!" )
  159.   (set #Err8 "Not enough memory!" )
  160.   (set #Err9 "Unknown error: 9" )
  161.   (set #Err10 "UPDATE not found!\n")
  162.   (set #ErrUnkown "Unknown error: %s" )
  163.  
  164.  )
  165. )
  166. ; ---------------------------------------------------------------------
  167. ;
  168. ;   STRINGS (Italian)
  169. ;
  170. ; ---------------------------------------------------------------------
  171. (if (= @language "italiano")
  172.  (
  173.   (set #SourceDir "TurboCalcCD:Italiano/TurboCalc")
  174.   (set #SourceDir_Disk "TurboCalc5_Disk1:TurboCalc")
  175.   (set #UpdateDir "Italiano")
  176.   (set #HelpDir "Aiuto")
  177.   (set #HelpDirOS2 "Aiuto_OS2")
  178.  
  179.   (set #welcome
  180.    (cat "Questo script aggiorna il programma " APPNAME
  181.         " dalla versione " OLDVERSION " alla nuova versione " NEWVERSION ".\n\n"
  182.   ))
  183.   (set #hello
  184.    (cat "Questo script aggiorna il programma " APPNAME
  185.         " dalla versione " OLDVERSION " alla nuova versione " NEWVERSION ".\n\n"
  186.         "Esso modifica la versione installata sul proprio disco rigido; "
  187.         "i vecchi file sono letti dal CD/Dischetto originale per essere "
  188.         "sicuri che essi appartengano davvero alla versione " OLDVERSION "." )
  189.   )
  190.  
  191.   (set #AskDestFile
  192.    (cat "Indicare il percorso (includendo il nome di " APPNAME ") in cui fu "
  193.         "installata la vecchia versione di " APPNAME ".\n" )
  194.   )
  195.  
  196.   (set #AskDestFileHelp
  197.    (cat "Scelta del cassetto in cui fu installato " APPNAME ".\n"
  198.         "Il nome del programma è in genere corretto e non deve essere cambiato.\n" )
  199.   )
  200.  
  201.   (set #updating (cat "Aggiornamento di %s ...\n\n"
  202.         "Attendere prego.\n" ))
  203.  
  204.   (set #ErrorUpdateMissing (cat "Programma per l'aggiornamento dei "
  205.         "file (%s) non disponibile. Inserire il CD-ROM"
  206.         "originale di TurboCalc5 (TurboCalcCD:) o il dischetto #1 "
  207.         "(TurboCalc5_Disk1:) e riprovare!" ))
  208.  
  209.   (set #ErrorPrgFileMissing (cat "Percorso di " APPNAME " errato (%s). "
  210.         "Il programma '%s' non è presente. "
  211.         "Scegliere il percorso/file corretto per " APPNAME " nella "
  212.         "seguente finestra per scelta file." ))
  213.  
  214.   (set #ErrorMsg (cat "Errore occorso durante l'aggiornamento:\n%s\n"
  215.             "Il file non è stato modificato.\n"))
  216.  
  217.   (set #Err1 "Impossibile aprire il file vecchio." )
  218.   (set #Err2 "Impossibile aprire il file dif." )
  219.   (set #Err3 "Impossibile aprire il file nuovo." )
  220.   (set #Err4 "File vecchio errato (dimensione errata), AGGIORNAMENTO impossibil